home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus Special 25
/
AMIGAplus Sonderheft 25 (2000)(Falke)(DE)(Track 1 of 4)[!].iso
/
Tools
/
SFX-Player
/
Mpeg
/
MrMPEG
/
GetAHI.rexx
< prev
next >
Wrap
OS/2 REXX Batch file
|
2000-05-08
|
458b
|
19 lines
/* GetAHI.rexx */
options results; address MrMPEG
MUIA_Disabled = 0x80423661
text ID AHID MUIA_Disabled 1
text ID AHID
address command 'GetAHIModeID 'X2D(right(result, 8))' >PIPE:MPEG_AHI'
if open('AHIMode', 'PIPE:MPEG_AHI', 'r') = 1 then do
temp = readln('AHIMode')
if left(temp, 2) = '0x' then do
text ID AHID LABEL "\033b\033r"temp
end
end
else request ID WARN GADGETS '"OK"' '"No AHI device available."'
text ID AHID MUIA_Disabled 0
return